﻿Public Class frmPrincipal

    Private Sub frmPrincipal_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim frm As New frmLogin1
        'frm.MdiParent = Me
        frm.Show()
        frm.txtLogin.Focus()



    End Sub

    Private Sub TrabalhadorToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrabalhadorToolStripMenuItem.Click
        frmCadastroTrabalhador.ShowDialog()

    End Sub

    Private Sub CursosEEspecializaçõesToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CursosEEspecializaçõesToolStripMenuItem.Click
        Dim j As New frmConsultaCursoEspecializacao("")
        j.Show()
    End Sub

    Private Sub EmpregadorToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EmpregadorToolStripMenuItem.Click
        Dim j As New frmCadastroEmpregador
        j.Show()

    End Sub

    Private Sub VagasDeTrabalhoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Dim j As New frmCadastroVagaDeTrabalho
        j.Show()

    End Sub

    Private Sub btnLimparTela_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLimparTela.Click
        Dim j As New frmCadastroEncaminhamento("", 0)
        j.Show()

    End Sub

    Private Sub EncaminhamentoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EncaminhamentoToolStripMenuItem.Click
       
    End Sub

    Private Sub CargoFunçãoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CargoFunçãoToolStripMenuItem.Click
        Dim j As New frmConsultaCargoFuncao

        j.Show()
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Dim f As New Form1
        f.Show()

    End Sub

    Private Sub CadastrarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CadastrarToolStripMenuItem.Click
        Dim j As New frmCadastroEncaminhamento("", 0)
        j.Show()
    End Sub

    Private Sub ConsultarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ConsultarToolStripMenuItem.Click
        Dim j As New frmConsultaEncaminhamento
        j.Show()
    End Sub

    Private Sub BaixarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Dim j As New frmCadastroBaixaEncaminhamento
        j.Show()
    End Sub

    Private Sub VagasToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles VagasToolStripMenuItem.Click
        Dim j As New frmCadastroVagaDeTrabalho
        j.Show()
    End Sub

    Private Sub ConsultarVagasToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ConsultarVagasToolStripMenuItem.Click
        Dim j As New frmConsultaVagaDeTrabalho
        j.Show()

  
    End Sub
End Class
